home *** CD-ROM | disk | FTP | other *** search
/ Aminet 52 / Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso / Aminet / dev / gg / ncurses-5.3.lha / ncurses-5.3 / ncurses / widechar / lib_wacs.c < prev    next >
C/C++ Source or Header  |  2002-10-24  |  6KB  |  128 lines

  1. /****************************************************************************
  2.  * Copyright (c) 2002 Free Software Foundation, Inc.                        *
  3.  *                                                                          *
  4.  * Permission is hereby granted, free of charge, to any person obtaining a  *
  5.  * copy of this software and associated documentation files (the            *
  6.  * "Software"), to deal in the Software without restriction, including      *
  7.  * without limitation the rights to use, copy, modify, merge, publish,      *
  8.  * distribute, distribute with modifications, sublicense, and/or sell       *
  9.  * copies of the Software, and to permit persons to whom the Software is    *
  10.  * furnished to do so, subject to the following conditions:                 *
  11.  *                                                                          *
  12.  * The above copyright notice and this permission notice shall be included  *
  13.  * in all copies or substantial portions of the Software.                   *
  14.  *                                                                          *
  15.  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  16.  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  17.  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  18.  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  19.  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  20.  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  21.  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  22.  *                                                                          *
  23.  * Except as contained in this notice, the name(s) of the above copyright   *
  24.  * holders shall not be used in advertising or otherwise to promote the     *
  25.  * sale, use or other dealings in this Software without prior written       *
  26.  * authorization.                                                           *
  27.  ****************************************************************************/
  28.  
  29. /****************************************************************************
  30.  *  Author: Thomas Dickey 2002                                              *
  31.  ****************************************************************************/
  32.  
  33. #include <curses.priv.h>
  34. #include <term.h>
  35.  
  36. MODULE_ID("$Id: lib_wacs.c,v 1.5 2002/08/31 19:44:17 tom Exp $")
  37.  
  38. NCURSES_EXPORT_VAR(cchar_t) * _nc_wacs = 0;
  39.  
  40. static int
  41. _nc_unicode_locale(void)
  42. {
  43.     char *s;
  44.     if (((s = getenv("LC_ALL")) != 0 && *s != '\0')
  45.     || ((s = getenv("LC_ALL")) != 0 && *s != '\0')
  46.     || ((s = getenv("LC_ALL")) != 0 && *s != '\0')) {
  47.     if (strstr(s, ".UTF-8") != 0)
  48.         return 1;
  49.     }
  50.     return 0;
  51. }
  52.  
  53. NCURSES_EXPORT(void)
  54. _nc_init_wacs(void)
  55. {
  56.     /* *INDENT-OFF* */
  57.     static const struct {
  58.     int    map;
  59.     int    value[2];
  60.     } table[] = {
  61.     /* VT100 symbols */
  62.     { 'l',    { '+',    0x250c }},    /* upper left corner */
  63.     { 'm',    { '+',    0x2514 }},    /* lower left corner */
  64.     { 'k',    { '+',    0x2510 }},    /* upper right corner */
  65.     { 'j',    { '+',    0x2518 }},    /* lower right corner */
  66.     { 't',    { '+',    0x251c }},    /* tee pointing left */
  67.     { 'u',    { '+',    0x2524 }},    /* tee pointing right */
  68.     { 'v',    { '+',    0x2534 }},    /* tee pointing up */
  69.     { 'w',    { '+',    0x252c }},    /* tee pointing down */
  70.     { 'q',    { '-',    0x2500 }},    /* horizontal line */
  71.     { 'x',    { '|',    0x2502 }},    /* vertical line */
  72.     { 'n',    { '+',    0x253c }},    /* large plus or crossover */
  73.     { 'o',    { '~',    0x23ba }},    /* scan line 1 */
  74.     { 's',    { '_',    0x23bd }},    /* scan line 9 */
  75.     { '`',    { '+',    0x25c6 }},    /* diamond */
  76.     { 'a',    { ':',    0x2592 }},    /* checker board (stipple) */
  77.     { 'f',    { '\'',    0x00b0 }},    /* degree symbol */
  78.     { 'g',    { '#',    0x00b1 }},    /* plus/minus */
  79.     { '~',    { 'o',    0x00b7 }},    /* bullet */
  80.     /* Teletype 5410v1 symbols */
  81.     { ',',    { '<',    0x2190 }},    /* arrow pointing left */
  82.     { '+',    { '>',    0x2192 }},    /* arrow pointing right */
  83.     { '.',    { 'v',    0x2193 }},    /* arrow pointing down */
  84.     { '-',    { '^',    0x2191 }},    /* arrow pointing up */
  85.     { 'h',    { '#',    0x2592 }},    /* board of squares */
  86.     { 'i',    { '#',    0x2603 }},    /* lantern symbol */
  87.     { '0',    { '#',    0x25ae }},    /* solid square block */
  88.     /* these defaults were invented for ncurses */
  89.     { 'p',    { '-',    0x23bb }},    /* scan line 3 */
  90.     { 'r',    { '-',    0x23bc }},    /* scan line 7 */
  91.     { 'y',    { '<',    0x2264 }},    /* less-than-or-equal-to */
  92.     { 'z',    { '>',    0x2265 }},    /* greater-than-or-equal-to */
  93.     { '{',    { '*',    0x03c0 }},    /* greek pi */
  94.     { '|',    { '!',    0x2260 }},    /* not-equal */
  95.     { '}',    { 'f',    0x00a3 }},    /* pound-sterling symbol */
  96.     };
  97.     /* *INDENT-ON* */
  98.  
  99.     unsigned n, m;
  100.     int active = _nc_unicode_locale();
  101.  
  102.     /*
  103.      * If we're running in a UTF-8 locale, will use the Unicode equivalents
  104.      * rather than the terminfo information.  Actually the terminfo should
  105.      * be the rule, but there are people who are offended by the notion that
  106.      * a Unicode-capable terminal would have something resembling a mode.
  107.      * So the smacs/rmacs may be disabled -- sometime.
  108.      */
  109.     T(("initializing WIDE-ACS map (Unicode is%s active)",
  110.        active ? "" : " not"));
  111.  
  112.     _nc_wacs = typeCalloc(cchar_t, ACS_LEN);
  113.     for (n = 0; n < SIZEOF(table); ++n) {
  114.     m = table[n].map;
  115.     if (active) {
  116.         SetChar(_nc_wacs[m], table[n].value[active], A_NORMAL);
  117.     } else if (acs_map[m] & A_ALTCHARSET) {
  118.         SetChar(_nc_wacs[m], m, A_ALTCHARSET);
  119.     } else {
  120.         SetChar(_nc_wacs[m], table[n].value[0], A_NORMAL);
  121.     }
  122.     T(("#%d, SetChar(%c, %#04x) = %s",
  123.        n, m,
  124.        table[n].value[active],
  125.        _tracecchar_t(&_nc_wacs[m])));
  126.     }
  127. }
  128.